home *** CD-ROM | disk | FTP | other *** search
/ The National Palace Museum Experience / The National Palace Museum Experience.iso / Programs / Object.dxr / 00095_MovieFrameScript.ls < prev    next >
Encoding:
Text File  |  1998-11-19  |  954 b   |  38 lines
  1. on movieframescript pspritenum
  2.   global gqtvrinstance, glasttimerollover
  3.   if rollOver(pspritenum) then
  4.     if qtvrgetvisible(gqtvrinstance) then
  5.       if isqtvrmovie(gqtvrinstance) then
  6.         set tmouseoverresult to qtvrmouseover(gqtvrinstance)
  7.         if tmouseoverresult <> 0 then
  8.           set taction to item 1 of tmouseoverresult
  9.           set glasttimerollover to 1
  10.         else
  11.           if rollOver(pspritenum) then
  12.             set glasttimerollover to 1
  13.           else
  14.             cursor(200)
  15.             cursor(-1)
  16.             set glasttimerollover to 0
  17.           end if
  18.         end if
  19.       end if
  20.     else
  21.       if glasttimerollover then
  22.         cursor(200)
  23.         cursor(-1)
  24.         set glasttimerollover to 0
  25.       end if
  26.     end if
  27.   else
  28.     if glasttimerollover then
  29.       cursor(200)
  30.       cursor(-1)
  31.       set glasttimerollover to 0
  32.     end if
  33.   end if
  34.   if isqtvrmovie(gqtvrinstance) then
  35.     qtvridle(gqtvrinstance)
  36.   end if
  37. end
  38.